-- an abstract example:
-- define a normal, stored and memoized rule:
op1 |a> => |x>
op1 |b> #=> |y>
op1 |c> !=> |z>
-- then copy them:
copy[op1, op2] rel-kets[op1]
-- now see what we have, using dump:
dump
op1 |a> => |x>
op2 |a> => |x>
op1 |b> #=> |y>
op2 |b> #=> |y>
op1 |c> !=> |z>
op2 |c> !=> |z>